home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
comm
/
cscript.zip
/
COMMO.MAC
< prev
next >
Wrap
Text File
|
1991-02-20
|
11KB
|
260 lines
╔═══════════════════════════════════════╗
───────────────────╢ Script Parameters ╟───────────────────
╚═══════════════════════════════════════╝
1F = FishNet 5C = Connect 9V = Va Connect 2
2P = The Pitt 6V = Va Connect 1 10W = WildCat Den
3R = Robert's Room 7C = CrossRoads 11F = First Ammend
4P = PWSA 8D = DataBit 12V = Va Connect 3
{top} {macr}{}
{bbs} {mark 1F,2P,3R,4P,5C,6V,7C,8D,9V,10W,11F,12V}{hold 04:30}
{bb_} {dial 75}{exit}
╔═══════════════════════════════════════╗
───────────────────╢ BBS Linked Macros ╟───────────────────
╚═══════════════════════════════════════╝
{bob} {capt y,PATH:robert}{goto wc1} - Robert's Room -
───────────────────────────────────────────────────────────────────────────────
{pwa} {capt y,PATH:pwsa}{goto wc1} - PWSA -
───────────────────────────────────────────────────────────────────────────────
{rod} {capt y,PATH:crossrds}{goto rb1} - Crossroads -
───────────────────────────────────────────────────────────────────────────────
{fsh} {capt y,PATH:fishnet}
{exen rem >PATH:fish.bbs}{goto pc1} - FishNet -
───────────────────────────────────────────────────────────────────────────────
{ptt} {capt y,PATH:thepitt}{goto pc1} - Pitt -
───────────────────────────────────────────────────────────────────────────────
{cnn} {capt y,PATH:connect!} - Connect! -
{cn1} {setl 90,gby,30,|}
{golo cn6,Escape key}
{look full name:}{send FIRST LAST|}
{look Password:}{send #|}
{cn2} {golo cn4,[Y/n]}
{ct2} {golo cn5,to continue}
{look Select:}
{exen if exist %c.rep ren PATH:rep.off rep.on}
{r10} {send m}
{look Select:}{send w}
{ra1} {setl 120,gby,,}
{golo ra2,press any key}
{golo ra6,Select:}
{look Command?}
{ifex PATH:rep.on,,rad}
{send u}
{look ^XB01}{call zup}
{ra8} {golo ra7,press any key}
{look Command?}{exen ren PATH:rep.on rep.off}
{rad} {send d}
{golo ra9,No mail today}
{look (A)bort Transfer}{send c}
{look ^XB00}{call zdn}
{ra4} {golo ra3,press any key}
{look command?}{send q}
{f_s} {setl 240,,gby}
{look Select:}
{fs1} {send f}
{look Select:}{send c}
{ct3} {golo ct4,[Y/n}
{golo ct4,[Return] to continue:}
{look Select:}
{ggg} {send g}
{look Select:}{send h}
{look no carrier}{goto gby}
{cn4} {send n}{goto cn2}
{cn5} {send |}{goto ct2}
{cn6} {send ^[}{goto cn1}
{ct4} {send |}{goto ct3}
{ra2} {send ~ }{goto ra1}
{ra3} {send ~ }{goto ra4}
{ra7} {send ~ }{goto ra8}
{ra9} {send ~ }{look Command?}{send q}{goto f_s}
{ra6} {ifex PATH:loop.bbs,fs1,}
{exen rem >PATH:loop.bbs}{goto r10}
───────────────────────────────────────────────────────────────────────────────
{dbt} {capt y,PATH:databit} - DataBit -
{exen rem >PATH:db.bbs}{goto pc1}
───────────────────────────────────────────────────────────────────────────────
{vir} {capt y,PATH:virgin} - Va Connect -
{unmark 6V,9V,12V}
{exen rem >PATH:virgin.bbs}{goto pc1}
───────────────────────────────────────────────────────────────────────────────
{cat} {capt y,PATH:catden} - WildCat Den -
{exen rem >PATH:catden.bbs}{goto wc1}
───────────────────────────────────────────────────────────────────────────────
{fmm} {capt y,PATH:1stamend} - First Amend -
{exen rem >PATH:1stamend.bbs}{goto wc1}
╔═══════════════════════════════════════╗
───────────────────╢ WildCat!/TomCat! ╟───────────────────
╚═══════════════════════════════════════╝
{wc1} {setl 180,gby,8,|}
{golo wc4,twice for BBS}
{golo wc4,twice to enter BBS}
{golo wc5,[N]onstop}
{look First Name?}
{exen if exist %c.rep ren PATH:rep.off rep.on}
{exen if exist %c.pth ren PATH:bi.off bi.on}
{send ~FIRST LAST #|}
{wc2} {golo bdy,birth date}
{golo ph#,phone number}
{golo gby,no carrier}
{look This is your}
{send }
{snd} {golo snn,special bulletin}
{wc3} {golo wc6,[N]onstop}
{golo wc7,quit:}
{golo y_n,y/n}
{golo wc7,[ENTER] to continue}
{golo gby,no carrier}
{look main menu}
{ifex PATH:catden.bbs,cd1,}
{ifex PATH:1stamend.bbs,fa1,}
{ifex PATH:bi.on,,ma2}
{send f}
{look file menu}{exen ren %c.pth bimodem.pth}
{send d}
{look Select:}{send ~b}
{bzx} {golo bzz,to Which Area}
{look ┬Θ═∩Σσφ}{call bim}
{look file menu}{exen ren PATH:bi.on bi.off}
{send q}{look main menu}
{ma2} {send ~m}
{setl 180,gby,60,|}{look message menu}{send ~o}
{tc1} {golo tc3,[ENTER] to continue}
{tc4} {look tomcat menu}
{ifex PATH:rep.on,,tc2}
{send u}
{look ^xB01}{call zup}
{golo gby,no carrier}
{look tomcat menu}{exen ren PATH:rep.on rep.off}
{tc2} {send d}
{golo nd9,Nothing to download}
{look ^xB00}{call zdn}
{nd9} {look tomcat menu}
{send q}
{golo n10,[C]ontinue}
{n11} {look MAIN MENU}{send ~g~ }
{look no carrier}{goto gby}
{n10} {send |}{goto n11}
{wc4} {send ^[~^[}{goto wc1}
{wc5} {send |}{goto wc1}
{bdy} {send MMDDYY|}{look Y/n}{send Y|}{goto wc2}
{ph#} {send 703XXXXXXX|}{look Y/n}{send Y|}{goto wc2}
{y_n} {send n}{goto wc3}
{wc6} {send s}{goto wc3}
{wc7} {send |}{goto wc3}
{tc3} {send |}{goto tc1}
{bzz} {send ~z}{goto bzx}
{cd1} {send d~ }
{look [Enter] to quit:}{send 14|}
{golo cd2,From Your Reader Now}
{look ^XB01}
{cd2} {exec dsz port %p sz -mu PATH:catden.ul}
{look ^XB00}{exec dsz port %p rz -m PATH:}
{look main menu}{send ~g~}
{look no carrier}{goto gby}
{fa1} {send d~ }
{look [Enter] to quit}{send ~1|}
{goto tc4}
{snn} {send | }{goto snd}
╔═══════════════════════════════════════╗
───────────────────╢ PCBoard/DJMail/MarkMail ╟───────────────────
╚═══════════════════════════════════════╝
{pc1} {setl 180,gby,,}
{golo pc4,=no?}
{golo pc4,want ansi graphics?}
{golo gby,no carrier}
{nnn} {look first name?}
{exen if exist %c.rep ren PATH:rep.off rep.on}
{exen if exist %c.pth ren PATH:bi.off bi.on}
{send FIRST LAST #|}
{pc2} {golo pc5,to continue}
{golo pc6,more?}
{golo pc6,=yes?}
{golo gby,no carrier}
{look Command}
{ifex PATH:bi.on,,ma1}
{exec ren %c.pth bimodem.pth}
{send open 2|}
{look ┬Θ═∩Σσ}{call bim}
{look Command?}{exec ren PATH:bi.on bi.off}
{ma1} {ifex PATH:virgin.bbs,mmo,}
{ifex PATH:fish.bbs,jmo,}
{ifex PATH:db.bbs,mm_,}
{send djmail|}
{pc8} {setl 180,gby,60,g|}
{look Command?}
{ifex PATH:rep.on,,pc3}
{send u|}
{look ^XB01}{call zup}
{look command?}{exen ren PATH:rep.on rep.off}
{pc3} {send d|}
{golo nmf,No messages found}
{golo nmf,nothing to send}
{golo p